perm filename LOSS.1[MAC,LSP]16 blob sn#657766 filedate 1982-05-05 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00013 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(foo baz (bazola))
C00008 00003	(do ()(())(print (tyi)))
C00017 00004	(em:tyi-message)
C00018 00005	(progn (em:ecommands '(α =))
C00019 00006	(defun foo ()(do ((i 50 (1- i)))
C00055 00007	(read)
C00059 00008	∂06-Feb-82  1412	RPG  	bazola   
C00060 00009	1	5
C00061 00010	twerp
C00066 00011	ren COMPLR.ofa←complr.fas
C00075 00012	'(
C00081 00013	(setq base 8 ibase 8)
C00082 ENDMK
C⊗;
(foo baz (bazola))
(do ()(())(print (tyi)))
(progn (tyi)(tyi)
       (do ((i (tyi)(tyi))
	    (n 1 (1+ n))
	    (j #o60 (cond ((= j #o71) #o60)
			  (t (1+ j))))) 
	   ((not (= i j)) (cond ((member i '(#o12 #o15)) 'read-ok)
				(t (setq x i y j z n) 'read-notok)))))
012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
(em:naecommands '(α - α p α - α p α - α p))
(em:tyi-message)
(em:condition-message)
(read)
 foobar
(e:eval-next-sexp)

(print
 '(
foo
bar))

((lambda (↑w) (print 'baz)(print 'foo)) t))
(foo bar)
(progn (em:ecommands '(α =))
       (open '((dsk (mac lsp)) let fas)))
(read)


(defun bazola ()
       ((LAMBDA (FOO BAR BAZ) 
		(PLUS (TIMES (PLUS 2 3 4 5 BAZ) (PLUS FOO BAR))))
	2
	3
	7))
(let ((base 10.)(*nopoint t))(explode (e:bin-search 'reset)))

d
(defun foo (x y)
 (plus x y)
 (break t t)
 (plus x y))
(defun foo ()(do ((i 50 (1- i)))
		 ((= i 0) t)))
(foo)
4
(plist 'em:mail-interrupt-handler)
(plist 'em:mail-tyo)
(plist 'em:mail-force-output)
(plist 'tb)
(setq n 0)

(progn
(setq s1 '(
(1PRINT FAS)
(1DTYPES S1L)
(1STACKG LM)
(1LAP S1L)
(1LMMAC LM)
(1HEAD )
(1GBS )
(1READER )
(1COMP 2)
(1OPSV4 FAS)
(14V LPT)
(1SLM PRE)
(1CATCH THI)
(1INTERP FAS)
(1CCFORM 23)
(1CHPROP 25)
(1LOC NIL)
(1REV FAS)
(1GARBAG 1)
(1DECOMP FAS)
(1PREFIX 1)
(1RP 24)
(1SFSMAN 13)
(1SHAPE 20)
(1VASFMT 3)
(1FILE FAS)
(1DEMON FAS)
(1FASLOA FAS)
(1CLOAD FAS)
(1LENGTH LSP)
(1ZPRINT LSP)
(1EDITOR OIN)
(1OPS S1L)
(1QCP1 LM)
(1HANOID LSP)
(1PACK4 LM)
(1ZMEMQ S1C)
(1GOFAST LSP)
(1RPRIN1 LSP)
(1COMPLR OIN)
(1LAP INI)
(1LENGTH )
(1NTYPES )
(1HANOI LSP)
(1S1FUN )
(1NILMAC LSP)
(1FASL FMT)
(1SYSCON LSP)
(1CLAP INI)
(1PRIMOP )
(1S1FUNS LSP)
(1LAP FAS)
(1ZMEMQ )
(1STRING 1)
(1MAKFAS DOC)
(1NILSIM LSP)
(1LAMBDA )
(1GC DOC)
(1FAS INI)
(1TODO 1)
(1AMBER )
(1OPS FOO)
(1REV 1)
(1GARBAG FAS)
(1INTERP INI)
(1OPS FAS)
(1GARCON LSP)
(1LENGTH S1C)
(1T MET)
(1S1CTST LSP)
(1S1COMP LSP)
(1MACLSP 6)
(1FASCON LSP)
(1DECOMP 7)
(1TESSIM LSP)
(1FACT S1)
(1OPSV4 FOO)
(1NEWFUN 59)
(1SLIDES POX)
(1HASHER )
(1VMACH 42)
(1CCENV 16)
(1ASMMAC 9)
(1COMAUX 6)
(1INTERP 2)
(1BUGS )
(1CLOAD INI)
(1YOW LSP)
(1UNION S1C)
(1DEMO LSP)
(1TYI S1)
(1ZLENGT S2C)
(1ADRHAC )
(1TTYIO LAP)
(1NULLFN LAP)
(1CONSES LSP)
(1ZLENGT S1C)
(1NILINI LAP)
(1ZPRIN1 S1C)
(1S1LAP INI)
(1FUNS )
(1FASLOA 3)
(1LMACRO INI)
(1GOSLOW LSP)
(1CLOAD 6)
(1TAIL 1)
(1REPORT )
(1FUNCAL 1)
(1READ LSP)
(1HACK LSP)
(1CONS LSP)
(1FINAL REP)
(1LAP 12)
(1HANOI2 LSP)
(1SLIDE POX)
(1TITLE )
(1ELISP INI)
(1OPS LSP)
(1NEWFUN 112)
(1ANALYZ FAS)
(1C 1)
(1LOSS 1)
(1C 2)
(1C FAS)
(1PPSAV TMP)
(1CM 1)
(1C 3)
(1C 4)
(1C 5)
(1C 6)
(1C 8)
(1S1COMP FAS)
(1C 7)
(1S1COM2 LSP)
(1OPS DOC)
(1OPEVAL DOC)
(1LAP LSP)
(1ANALYZ LSP)
(1ANALYZ PRE)
(1MAIL TXT)
(1NODE TYP)
(1TAIL DSC)
(1AN LSP)
(1FOO )
(1FOO BAR)
(1CMUC WRK)
(1CODEGE LSP)
(1AN NEW)
(1ANALYZ UNF)
(1CODEGE PRE)
(1CRAWL 1)
(1LOGIN CMD)
(1IMPL PRE)
(1CRAWL FAS)
(1ANAL INI)
(1LISP INI)
(1RPRIN1 FAS)
(1STRING LSP)
(1CODEGE FAS)
(1PROCOM INI)
(1COMP WRK)
(1COMP LSP)
(1PROCOM DMP)
(1PROCOM LSP)
(1FOO INI)
(1CMU REP)
(1S1COMP BUG)
(1S1COMP OUT)
(1COMP LAP)
(1COMP TST)
(1PROCOM FAS)
(1PROG LSP)
(1PROG LAP)
(1PROGN LSP)
(1PROGN LAP)
(1COMLSP )
(1DIR LSP))) 
;(setq n (1+ n))
)

(progn
(setq s1 '(
(1PRINT FAS)
(1DTYPES S1L)
(1STACKG LM)
(1LAP S1L)
(1LMMAC LM)
(1HEAD )
(1GBS )
(1READER )
(1COMP 2)
(1OPSV4 FAS)
(14V LPT)
(1SLM PRE)
(1CATCH THI)
(1INTERP FAS)
(1CCFORM 23)
(1CHPROP 25)
(1LOC NIL)
(1REV FAS)
(1GARBAG 1)
(1DECOMP FAS)
(1PREFIX 1)
(1RP 24)
(1SFSMAN 13)
(1SHAPE 20)
(1VASFMT 3)
(1FILE FAS)
(1DEMON FAS)
(1FASLOA FAS)
(1CLOAD FAS)
(1LENGTH LSP)
(1ZPRINT LSP)
(1EDITOR OIN)
(1OPS S1L)
(1QCP1 LM)
(1HANOID LSP)
(1PACK4 LM)
(1ZMEMQ S1C)
(1GOFAST LSP)
(1RPRIN1 LSP)
(1COMPLR OIN)
(1LAP INI)
(1LENGTH )
(1NTYPES )
(1HANOI LSP)
(1S1FUN )
(1NILMAC LSP)
(1FASL FMT)
(1SYSCON LSP)
(1CLAP INI)
(1PRIMOP )
(1S1FUNS LSP)
(1LAP FAS)
(1ZMEMQ )
(1STRING 1)
(1MAKFAS DOC)
(1NILSIM LSP)
(1LAMBDA )
(1GC DOC)
(1FAS INI)
(1TODO 1)
(1AMBER )
(1OPS FOO)
(1REV 1)
(1GARBAG FAS)
(1INTERP INI)
(1OPS FAS)
(1GARCON LSP)
(1LENGTH S1C)
(1T MET)
(1S1CTST LSP)
(1S1COMP LSP)
(1MACLSP 6)
(1FASCON LSP)
(1DECOMP 7)
(1TESSIM LSP)
(1FACT S1)
(1OPSV4 FOO)
(1NEWFUN 59)
(1SLIDES POX)
(1HASHER )
(1VMACH 42)
(1CCENV 16)
(1ASMMAC 9)
(1COMAUX 6)
(1INTERP 2)
(1BUGS )
(1CLOAD INI)
(1YOW LSP)
(1UNION S1C)
(1DEMO LSP)
(1TYI S1)
(1ZLENGT S2C)
(1ADRHAC )
(1TTYIO LAP)
(1NULLFN LAP)
(1CONSES LSP)
(1ZLENGT S1C)
(1NILINI LAP)
(1ZPRIN1 S1C)
(1S1LAP INI)
(1FUNS )
(1FASLOA 3)
(1LMACRO INI)
(1GOSLOW LSP)
(1CLOAD 6)
(1TAIL 1)
(1REPORT )
(1FUNCAL 1)
(1READ LSP)
(1HACK LSP)
(1CONS LSP)
(1FINAL REP)
(1LAP 12)
(1HANOI2 LSP)
(1SLIDE POX)
(1TITLE )
(1ELISP INI)
(1OPS LSP)
(1NEWFUN 112)
(1ANALYZ FAS)
(1C 1)
(1LOSS 1)
(1C 2)
(1C FAS)
(1PPSAV TMP)
(1CM 1)
(1C 3)
(1C 4)
(1C 5)
(1C 6)
(1C 8)
(1S1COMP FAS)
(1C 7)
(1S1COM2 LSP)
(1OPS DOC)
(1OPEVAL DOC)
(1LAP LSP)
(1ANALYZ LSP)
(1ANALYZ PRE)
(1MAIL TXT)
(1NODE TYP)
(1TAIL DSC)
(1AN LSP)
(1FOO )
(1FOO BAR)
(1CMUC WRK)
(1CODEGE LSP)
(1AN NEW)
(1ANALYZ UNF)
(1CODEGE PRE)
(1CRAWL 1)
(1LOGIN CMD)
(1IMPL PRE)
(1CRAWL FAS)
(1ANAL INI)
(1LISP INI)
(1RPRIN1 FAS)
(1STRING LSP)
(1CODEGE FAS)
(1PROCOM INI)
(1COMP WRK)
(1COMP LSP)
(1PROCOM DMP)
(1PROCOM LSP)
(1FOO INI)
(1CMU REP)
(1S1COMP BUG)
(1S1COMP OUT)
(1COMP LAP)
(1COMP TST)
(1PROCOM FAS)
(1PROG LSP)
(1PROG LAP)
(1PROGN LSP)
(1PROGN LAP)
(1COMLSP )
(1DIR LSP))) 
;(setq n (1+ n))
)

(progn
(setq s2 '(
(2PRINT FAS)
(2DTYPES S1L)
(2STACKG LM)
(2LAP S1L)
(2LMMAC LM)
(2HEAD )
(2GBS )
(2READER )
(2COMP 2)
(2OPSV4 FAS)
(24V LPT)
(2SLM PRE)
(2CATCH THI)
(2INTERP FAS)
(2CCFORM 23)
(2CHPROP 25)
(2LOC NIL)
(2REV FAS)
(2GARBAG 1)
(2DECOMP FAS)
(2PREFIX 1)
(2RP 24)
(2SFSMAN 13)
(2SHAPE 20)
(2VASFMT 3)
(2FILE FAS)
(2DEMON FAS)
(2FASLOA FAS)
(2CLOAD FAS)
(2LENGTH LSP)
(2ZPRINT LSP)
(2EDITOR OIN)
(2OPS S1L)
(2QCP1 LM)
(2HANOID LSP)
(2PACK4 LM)
(2ZMEMQ S1C)
(2GOFAST LSP)
(2RPRIN1 LSP)
(2COMPLR OIN)
(2LAP INI)
(2LENGTH )
(2NTYPES )
(2HANOI LSP)
(2S1FUN )
(2NILMAC LSP)
(2FASL FMT)
(2SYSCON LSP)
(2CLAP INI)
(2PRIMOP )
(2S1FUNS LSP)
(2LAP FAS)
(2ZMEMQ )
(2STRING 1)
(2MAKFAS DOC)
(2NILSIM LSP)
(2LAMBDA )
(2GC DOC)
(2FAS INI)
(2TODO 1)
(2AMBER )
(2OPS FOO)
(2REV 1)
(2GARBAG FAS)
(2INTERP INI)
(2OPS FAS)
(2GARCON LSP)
(2LENGTH S1C)
(2T MET)
(2S1CTST LSP)
(2S1COMP LSP)
(2MACLSP 6)
(2FASCON LSP)
(2DECOMP 7)
(2TESSIM LSP)
(2FACT S1)
(2OPSV4 FOO)
(2NEWFUN 59)
(2SLIDES POX)
(2HASHER )
(2VMACH 42)
(2CCENV 16)
(2ASMMAC 9)
(2COMAUX 6)
(2INTERP 2)
(2BUGS )
(2CLOAD INI)
(2YOW LSP)
(2UNION S1C)
(2DEMO LSP)
(2TYI S1)
(2ZLENGT S2C)
(2ADRHAC )
(2TTYIO LAP)
(2NULLFN LAP)
(2CONSES LSP)
(2ZLENGT S1C)
(2NILINI LAP)
(2ZPRIN1 S1C)
(2S1LAP INI)
(2FUNS )
(2FASLOA 3)
(2LMACRO INI)
(2GOSLOW LSP)
(2CLOAD 6)
(2TAIL 1)
(2REPORT )
(2FUNCAL 1)
(2READ LSP)
(2HACK LSP)
(2CONS LSP)
(2FINAL REP)
(2LAP 12)
(2HANOI2 LSP)
(2SLIDE POX)
(2TITLE )
(2ELISP INI)
(2OPS LSP)
(2NEWFUN 112)
(2ANALYZ FAS)
(2C 1)
(2LOSS 1)
(2C 2)
(2C FAS)
(2PPSAV TMP)
(2CM 1)
(2C 3)
(2C 4)
(2C 5)
(2C 6)
(2C 8)
(2S1COMP FAS)
(2C 7)
(2S1COM2 LSP)
(2OPS DOC)
(2OPEVAL DOC)
(2LAP LSP)
(2ANALYZ LSP)
(2ANALYZ PRE)
(2MAIL TXT)
(2NODE TYP)
(2TAIL DSC)
(2AN LSP)
(2FOO )
(2FOO BAR)
(2CMUC WRK)
(2CODEGE LSP)
(2AN NEW)
(2ANALYZ UNF)
(2CODEGE PRE)
(2CRAWL 1)
(2LOGIN CMD)
(2IMPL PRE)
(2CRAWL FAS)
(2ANAL INI)
(2LISP INI)
(2RPRIN1 FAS)
(2STRING LSP)
(2CODEGE FAS)
(2PROCOM INI)
(2COMP WRK)
(2COMP LSP))) 
;(setq n (1+ n))
)
(progn
(setq s3 '(
(3PRINT FAS)
(3DTYPES S1L)
(3STACKG LM)
(3LAP S1L)
(3LMMAC LM)
(3HEAD )
(3GBS )
(3READER )
(3COMP 2)
(3OPSV4 FAS)
(34V LPT)
(3SLM PRE)
(3CATCH THI)
(3INTERP FAS)
(3CCFORM 23)
(3CHPROP 25)
(3LOC NIL)
(3REV FAS)
(3GARBAG 1)
(3DECOMP FAS)
(3PREFIX 1)
(3RP 24)
(3SFSMAN 13)
(3SHAPE 20)
(3VASFMT 3)
(3FILE FAS)
(3DEMON FAS)
(3FASLOA FAS)
(3CLOAD FAS)
(3LENGTH LSP)
(3ZPRINT LSP)
(3EDITOR OIN)
(3OPS S1L)
(3QCP1 LM)
(3HANOID LSP)
(3PACK4 LM)
(3ZMEMQ S1C)
(3GOFAST LSP)
(3RPRIN1 LSP)
(3COMPLR OIN)
(3LAP INI)
(3LENGTH )
(3NTYPES )
(3HANOI LSP)
(3S1FUN )
(3NILMAC LSP)
(3FASL FMT)
(3SYSCON LSP)
(3CLAP INI)
(3PRIMOP )
(3S1FUNS LSP)
(3LAP FAS)
(3ZMEMQ )
(3STRING 1)
(3MAKFAS DOC)
(3NILSIM LSP)
(3LAMBDA )
(3GC DOC)
(3FAS INI)
(3TODO 1)
(3AMBER )
(3OPS FOO)
(3REV 1)
(3GARBAG FAS)
(3INTERP INI)
(3OPS FAS)
(3GARCON LSP)
(3LENGTH S1C)
(3T MET)
(3S1CTST LSP)
(3S1COMP LSP)
(3MACLSP 6)
(3FASCON LSP)
(3DECOMP 7)
(3TESSIM LSP)
(3FACT S1)
(3OPSV4 FOO)
(3NEWFUN 59)
(3SLIDES POX)
(3HASHER )
(3VMACH 42)
(3CCENV 16)
(3ASMMAC 9)
(3COMAUX 6)
(3INTERP 2)
(3BUGS )
(3CLOAD INI)
(3YOW LSP)
(3UNION S1C)
(3DEMO LSP)
(3TYI S1)
(3ZLENGT S2C)
(3ADRHAC )
(3TTYIO LAP)
(3NULLFN LAP)
(3CONSES LSP)
(3ZLENGT S1C)
(3NILINI LAP)
(3ZPRIN1 S1C)
(3S1LAP INI)
(3FUNS )
(3FASLOA 3)
(3LMACRO INI)
(3GOSLOW LSP)
(3CLOAD 6)
(3TAIL 1)
(3REPORT )
(3FUNCAL 1)
(3READ LSP)
(3HACK LSP)
(3CONS LSP)
(3FINAL REP)
(3LAP 12)
(3HANOI2 LSP)
(3SLIDE POX)
(3TITLE )
(3ELISP INI)
(3OPS LSP)
(3NEWFUN 112)
(3ANALYZ FAS)
(3C 1)
(3LOSS 1)
(3C 2)
(3C FAS)
(3PPSAV TMP)
(3CM 1)
(3C 3)
(3C 4)
(3C 5)
(3C 6)
(3C 8)
(3S1COMP FAS)
(3C 7)
(3S1COM2 LSP)
(3OPS DOC)
(3OPEVAL DOC)
(3LAP LSP)
(3ANALYZ LSP)
(3ANALYZ PRE)
(3MAIL TXT)
(3NODE TYP)
(3TAIL DSC)
(3AN LSP)
(3FOO )
(3FOO BAR)
(3CMUC WRK)
(3CODEGE LSP)
(3AN NEW)
(3ANALYZ UNF)
(3CODEGE PRE)
(3CRAWL 1)
(3LOGIN CMD)
(3IMPL PRE)
(3CRAWL FAS)
(3ANAL INI)
(3LISP INI)
(3RPRIN1 FAS)
(3STRING LSP)
(3CODEGE FAS)
(3PROCOM INI)
(3COMP WRK)
(3COMP LSP)
(3PROCOM DMP)
(3PROCOM LSP)
(3FOO INI)
(3CMU REP)
(3S1COMP BUG)
(3S1COMP OUT)
(3COMP LAP)
(3COMP TST)
(3PROCOM FAS)
(3PROG LSP)
(3PROG LAP)
(3PROGN LSP)
(3PROGN LAP)
(3COMLSP )
(3DIR LSP)))
;(setq n (1+ n))
)
 
(progn
(setq s4 '(
(4PRINT FAS)
(4DTYPES S1L)
(4STACKG LM)
(4LAP S1L)
(4LMMAC LM)
(4HEAD )
(4GBS )
(4READER )
(4COMP 2)
(4OPSV4 FAS)
(44V LPT)
(4SLM PRE)
(4CATCH THI)
(4INTERP FAS)
(4CCFORM 23)
(4CHPROP 25)
(4LOC NIL)
(4REV FAS)
(4GARBAG 1)
(4DECOMP FAS)
(4PREFIX 1)
(4RP 24)
(4SFSMAN 13)
(4SHAPE 20)
(4VASFMT 3)
(4FILE FAS)
(4DEMON FAS)
(4FASLOA FAS)
(4CLOAD FAS)
(4LENGTH LSP)
(4ZPRINT LSP)
(4EDITOR OIN)
(4OPS S1L)
(4QCP1 LM)
(4HANOID LSP)
(4PACK4 LM)
(4ZMEMQ S1C)
(4GOFAST LSP)
(4RPRIN1 LSP)
(4COMPLR OIN)
(4LAP INI)
(4LENGTH )
(4NTYPES )
(4HANOI LSP)
(4S1FUN )
(4NILMAC LSP)
(4FASL FMT)
(4SYSCON LSP)
(4CLAP INI)
(4PRIMOP )
(4S1FUNS LSP)
(4LAP FAS)
(4ZMEMQ )
(4STRING 1)
(4MAKFAS DOC)
(4NILSIM LSP)
(4LAMBDA )
(4GC DOC)
(4FAS INI)
(4TODO 1)
(4AMBER )
(4OPS FOO)
(4REV 1)
(4GARBAG FAS)
(4INTERP INI)
(4OPS FAS)
(4GARCON LSP)
(4LENGTH S1C)
(4T MET)
(4S1CTST LSP)
(4S1COMP LSP)
(4MACLSP 6)
(4FASCON LSP)
(4DECOMP 7)
(4TESSIM LSP)
(4FACT S1)
(4OPSV4 FOO)
(4NEWFUN 59)
(4SLIDES POX)
(4HASHER )
(4VMACH 42)
(4CCENV 16)
(4ASMMAC 9)
(4COMAUX 6)
(4INTERP 2)
(4BUGS )
(4CLOAD INI)
(4YOW LSP)
(4UNION S1C)
(4DEMO LSP)
(4TYI S1)
(4ZLENGT S2C)
(4ADRHAC )
(4TTYIO LAP)
(4NULLFN LAP)
(4CONSES LSP)
(4ZLENGT S1C)
(4NILINI LAP)
(4ZPRIN1 S1C)
(4S1LAP INI)
(4FUNS )
(4FASLOA 3)
(4LMACRO INI)
(4GOSLOW LSP)
(4CLOAD 6)
(4TAIL 1)
(4REPORT )
(4FUNCAL 1)
(4READ LSP)
(4HACK LSP)
(4CONS LSP)
(4FINAL REP)
(4LAP 12)
(4HANOI2 LSP)
(4SLIDE POX)
(4TITLE )
(4ELISP INI)
(4OPS LSP)
(4NEWFUN 112)
(4ANALYZ FAS)
(4C 1)
(4LOSS 1)
(4C 2)
(4C FAS)
(4PPSAV TMP)
(4CM 1)
(4C 3)
(4C 4)
(4C 5)
(4C 6)
(4C 8)
(4S1COMP FAS)
(4C 7)
(4S1COM2 LSP)
(4OPS DOC)
(4OPEVAL DOC)
(4LAP LSP)
(4ANALYZ LSP)
(4ANALYZ PRE)
(4MAIL TXT)
(4NODE TYP)
(4TAIL DSC)
(4AN LSP)
(4FOO )
(4FOO BAR)
(4CMUC WRK)
(4CODEGE LSP)
(4AN NEW)
(4ANALYZ UNF)
(4CODEGE PRE)
(4CRAWL 1)
(4LOGIN CMD)
(4IMPL PRE)
(4CRAWL FAS)
(4ANAL INI)
(4LISP INI)
(4RPRIN1 FAS)
(4STRING LSP)
(4CODEGE FAS)
(4PROCOM INI)
(4COMP WRK)
(4COMP LSP))) 
;(setq n (1+ n))
)
(progn
(setq s1 '(
(1PRINT FAS)
(1DTYPES S1L)
(1STACKG LM)
(1LAP S1L)
(1LMMAC LM)
(1HEAD )
(1GBS )
(1READER )
(1COMP 2)
(1OPSV4 FAS)
(14V LPT)
(1SLM PRE)
(1CATCH THI)
(1INTERP FAS)
(1CCFORM 23)
(1CHPROP 25)
(1LOC NIL)
(1REV FAS)
(1GARBAG 1)
(1DECOMP FAS)
(1PREFIX 1)
(1RP 24)
(1SFSMAN 13)
(1SHAPE 20)
(1VASFMT 3)
(1FILE FAS)
(1DEMON FAS)
(1FASLOA FAS)
(1CLOAD FAS)
(1LENGTH LSP)
(1ZPRINT LSP)
(1EDITOR OIN)
(1OPS S1L)
(1QCP1 LM)
(1HANOID LSP)
(1PACK4 LM)
(1ZMEMQ S1C)
(1GOFAST LSP)
(1RPRIN1 LSP)
(1COMPLR OIN)
(1LAP INI)
(1LENGTH )
(1NTYPES )
(1HANOI LSP)
(1S1FUN )
(1NILMAC LSP)
(1FASL FMT)
(1SYSCON LSP)
(1CLAP INI)
(1PRIMOP )
(1S1FUNS LSP)
(1LAP FAS)
(1ZMEMQ )
(1STRING 1)
(1MAKFAS DOC)
(1NILSIM LSP)
(1LAMBDA )
(1GC DOC)
(1FAS INI)
(1TODO 1)
(1AMBER )
(1OPS FOO)
(1REV 1)
(1GARBAG FAS)
(1INTERP INI)
(1OPS FAS)
(1GARCON LSP)
(1LENGTH S1C)
(1T MET)
(1S1CTST LSP)
(1S1COMP LSP)
(1MACLSP 6)
(1FASCON LSP)
(1DECOMP 7)
(1TESSIM LSP)
(1FACT S1)
(1OPSV4 FOO)
(1NEWFUN 59)
(1SLIDES POX)
(1HASHER )
(1VMACH 42)
(1CCENV 16)
(1ASMMAC 9)
(1COMAUX 6)
(1INTERP 2)
(1BUGS )
(1CLOAD INI)
(1YOW LSP)
(1UNION S1C)
(1DEMO LSP)
(1TYI S1)
(1ZLENGT S2C)
(1ADRHAC )
(1TTYIO LAP)
(1NULLFN LAP)
(1CONSES LSP)
(1ZLENGT S1C)
(1NILINI LAP)
(1ZPRIN1 S1C)
(1S1LAP INI)
(1FUNS )
(1FASLOA 3)
(1LMACRO INI)
(1GOSLOW LSP)
(1CLOAD 6)
(1TAIL 1)
(1REPORT )
(1FUNCAL 1)
(1READ LSP)
(1HACK LSP)
(1CONS LSP)
(1FINAL REP)
(1LAP 12)
(1HANOI2 LSP)
(1SLIDE POX)
(1TITLE )
(1ELISP INI)
(1OPS LSP)
(1NEWFUN 112)
(1ANALYZ FAS)
(1C 1)
(1LOSS 1)
(1C 2)
(1C FAS)
(1PPSAV TMP)
(1CM 1)
(1C 3)
(1C 4)
(1C 5)
(1C 6)
(1C 8)
(1S1COMP FAS)
(1C 7)
(1S1COM2 LSP)
(1OPS DOC)
(1OPEVAL DOC)
(1LAP LSP)
(1ANALYZ LSP)
(1ANALYZ PRE)
(1MAIL TXT)
(1NODE TYP)
(1TAIL DSC)
(1AN LSP)
(1FOO )
(1FOO BAR)
(1CMUC WRK)
(1CODEGE LSP)
(1AN NEW)
(1ANALYZ UNF)
(1CODEGE PRE)
(1CRAWL 1)
(1LOGIN CMD)
(1IMPL PRE)
(1CRAWL FAS)
(1ANAL INI)
(1LISP INI)
(1RPRIN1 FAS)
(1STRING LSP)
(1CODEGE FAS)
(1PROCOM INI)
(1COMP WRK)
(1COMP LSP)
(1PROCOM DMP)
(1PROCOM LSP)
(1FOO INI)
(1CMU REP)
(1S1COMP BUG)
(1S1COMP OUT)
(1COMP LAP)
(1COMP TST)
(1PROCOM FAS)
(1PROG LSP)
(1PROG LAP)
(1PROGN LSP)
(1PROGN LAP)
(1COMLSP )
(1DIR LSP))) 
;(setq n (1+ n))
)

(progn
(setq s1 '(
(1PRINT FAS)
(1DTYPES S1L)
(1STACKG LM)
(1LAP S1L)
(1LMMAC LM)
(1HEAD )
(1GBS )
(1READER )
(1COMP 2)
(1OPSV4 FAS)
(14V LPT)
(1SLM PRE)
(1CATCH THI)
(1INTERP FAS)
(1CCFORM 23)
(1CHPROP 25)
(1LOC NIL)
(1REV FAS)
(1GARBAG 1)
(1DECOMP FAS)
(1PREFIX 1)
(1RP 24)
(1SFSMAN 13)
(1SHAPE 20)
(1VASFMT 3)
(1FILE FAS)
(1DEMON FAS)
(1FASLOA FAS)
(1CLOAD FAS)
(1LENGTH LSP)
(1ZPRINT LSP)
(1EDITOR OIN)
(1OPS S1L)
(1QCP1 LM)
(1HANOID LSP)
(1PACK4 LM)
(1ZMEMQ S1C)
(1GOFAST LSP)
(1RPRIN1 LSP)
(1COMPLR OIN)
(1LAP INI)
(1LENGTH )
(1NTYPES )
(1HANOI LSP)
(1S1FUN )
(1NILMAC LSP)
(1FASL FMT)
(1SYSCON LSP)
(1CLAP INI)
(1PRIMOP )
(1S1FUNS LSP)
(1LAP FAS)
(1ZMEMQ )
(1STRING 1)
(1MAKFAS DOC)
(1NILSIM LSP)
(1LAMBDA )
(1GC DOC)
(1FAS INI)
(1TODO 1)
(1AMBER )
(1OPS FOO)
(1REV 1)
(1GARBAG FAS)
(1INTERP INI)
(1OPS FAS)
(1GARCON LSP)
(1LENGTH S1C)
(1T MET)
(1S1CTST LSP)
(1S1COMP LSP)
(1MACLSP 6)
(1FASCON LSP)
(1DECOMP 7)
(1TESSIM LSP)
(1FACT S1)
(1OPSV4 FOO)
(1NEWFUN 59)
(1SLIDES POX)
(1HASHER )
(1VMACH 42)
(1CCENV 16)
(1ASMMAC 9)
(1COMAUX 6)
(1INTERP 2)
(1BUGS )
(1CLOAD INI)
(1YOW LSP)
(1UNION S1C)
(1DEMO LSP)
(1TYI S1)
(1ZLENGT S2C)
(1ADRHAC )
(1TTYIO LAP)
(1NULLFN LAP)
(1CONSES LSP)
(1ZLENGT S1C)
(1NILINI LAP)
(1ZPRIN1 S1C)
(1S1LAP INI)
(1FUNS )
(1FASLOA 3)
(1LMACRO INI)
(1GOSLOW LSP)
(1CLOAD 6)
(1TAIL 1)
(1REPORT )
(1FUNCAL 1)
(1READ LSP)
(1HACK LSP)
(1CONS LSP)
(1FINAL REP)
(1LAP 12)
(1HANOI2 LSP)
(1SLIDE POX)
(1TITLE )
(1ELISP INI)
(1OPS LSP)
(1NEWFUN 112)
(1ANALYZ FAS)
(1C 1)
(1LOSS 1)
(1C 2)
(1C FAS)
(1PPSAV TMP)
(1CM 1)
(1C 3)
(1C 4)
(1C 5)
(1C 6)
(1C 8)
(1S1COMP FAS)
(1C 7)
(1S1COM2 LSP)
(1OPS DOC)
(1OPEVAL DOC)
(1LAP LSP)
(1ANALYZ LSP)
(1ANALYZ PRE)
(1MAIL TXT)
(1NODE TYP)
(1TAIL DSC)
(1AN LSP)
(1FOO )
(1FOO BAR)
(1CMUC WRK)
(1CODEGE LSP)
(1AN NEW)
(1ANALYZ UNF)
(1CODEGE PRE)
(1CRAWL 1)
(1LOGIN CMD)
(1IMPL PRE)
(1CRAWL FAS)
(1ANAL INI)
(1LISP INI)
(1RPRIN1 FAS)
(1STRING LSP)
(1CODEGE FAS)
(1PROCOM INI)
(1COMP WRK)
(1COMP LSP)
(1PROCOM DMP)
(1PROCOM LSP)
(1FOO INI)
(1CMU REP)
(1S1COMP BUG)
(1S1COMP OUT)
(1COMP LAP)
(1COMP TST)
(1PROCOM FAS)
(1PROG LSP)
(1PROG LAP)
(1PROGN LSP)
(1PROGN LAP)
(1COMLSP )
(1DIR LSP))) 
;(setq n (1+ n))
)

(progn
(setq s2 '(
(2PRINT FAS)
(2DTYPES S1L)
(2STACKG LM)
(2LAP S1L)
(2LMMAC LM)
(2HEAD )
(2GBS )
(2READER )
(2COMP 2)
(2OPSV4 FAS)
(24V LPT)
(2SLM PRE)
(2CATCH THI)
(2INTERP FAS)
(2CCFORM 23)
(2CHPROP 25)
(2LOC NIL)
(2REV FAS)
(2GARBAG 1)
(2DECOMP FAS)
(2PREFIX 1)
(2RP 24)
(2SFSMAN 13)
(2SHAPE 20)
(2VASFMT 3)
(2FILE FAS)
(2DEMON FAS)
(2FASLOA FAS)
(2CLOAD FAS)
(2LENGTH LSP)
(2ZPRINT LSP)
(2EDITOR OIN)
(2OPS S1L)
(2QCP1 LM)
(2HANOID LSP)
(2PACK4 LM)
(2ZMEMQ S1C)
(2GOFAST LSP)
(2RPRIN1 LSP)
(2COMPLR OIN)
(2LAP INI)
(2LENGTH )
(2NTYPES )
(2HANOI LSP)
(2S1FUN )
(2NILMAC LSP)
(2FASL FMT)
(2SYSCON LSP)
(2CLAP INI)
(2PRIMOP )
(2S1FUNS LSP)
(2LAP FAS)
(2ZMEMQ )
(2STRING 1)
(2MAKFAS DOC)
(2NILSIM LSP)
(2LAMBDA )
(2GC DOC)
(2FAS INI)
(2TODO 1)
(2AMBER )
(2OPS FOO)
(2REV 1)
(2GARBAG FAS)
(2INTERP INI)
(2OPS FAS)
(2GARCON LSP)
(2LENGTH S1C)
(2T MET)
(2S1CTST LSP)
(2S1COMP LSP)
(2MACLSP 6)
(2FASCON LSP)
(2DECOMP 7)
(2TESSIM LSP)
(2FACT S1)
(2OPSV4 FOO)
(2NEWFUN 59)
(2SLIDES POX)
(2HASHER )
(2VMACH 42)
(2CCENV 16)
(2ASMMAC 9)
(2COMAUX 6)
(2INTERP 2)
(2BUGS )
(2CLOAD INI)
(2YOW LSP)
(2UNION S1C)
(2DEMO LSP)
(2TYI S1)
(2ZLENGT S2C)
(2ADRHAC )
(2TTYIO LAP)
(2NULLFN LAP)
(2CONSES LSP)
(2ZLENGT S1C)
(2NILINI LAP)
(2ZPRIN1 S1C)
(2S1LAP INI)
(2FUNS )
(2FASLOA 3)
(2LMACRO INI)
(2GOSLOW LSP)
(2CLOAD 6)
(2TAIL 1)
(2REPORT )
(2FUNCAL 1)
(2READ LSP)
(2HACK LSP)
(2CONS LSP)
(2FINAL REP)
(2LAP 12)
(2HANOI2 LSP)
(2SLIDE POX)
(2TITLE )
(2ELISP INI)
(2OPS LSP)
(2NEWFUN 112)
(2ANALYZ FAS)
(2C 1)
(2LOSS 1)
(2C 2)
(2C FAS)
(2PPSAV TMP)
(2CM 1)
(2C 3)
(2C 4)
(2C 5)
(2C 6)
(2C 8)
(2S1COMP FAS)
(2C 7)
(2S1COM2 LSP)
(2OPS DOC)
(2OPEVAL DOC)
(2LAP LSP)
(2ANALYZ LSP)
(2ANALYZ PRE)
(2MAIL TXT)
(2NODE TYP)
(2TAIL DSC)
(2AN LSP)
(2FOO )
(2FOO BAR)
(2CMUC WRK)
(2CODEGE LSP)
(2AN NEW)
(2ANALYZ UNF)
(2CODEGE PRE)
(2CRAWL 1)
(2LOGIN CMD)
(2IMPL PRE)
(2CRAWL FAS)
(2ANAL INI)
(2LISP INI)
(2RPRIN1 FAS)
(2STRING LSP)
(2CODEGE FAS)
(2PROCOM INI)
(2COMP WRK)
(2COMP LSP))) 
;(setq n (1+ n))
)
(progn
(setq s3 '(
(3PRINT FAS)
(3DTYPES S1L)
(3STACKG LM)
(3LAP S1L)
(3LMMAC LM)
(3HEAD )
(3GBS )
(3READER )
(3COMP 2)
(3OPSV4 FAS)
(34V LPT)
(3SLM PRE)
(3CATCH THI)
(3INTERP FAS)
(3CCFORM 23)
(3CHPROP 25)
(3LOC NIL)
(3REV FAS)
(3GARBAG 1)
(3DECOMP FAS)
(3PREFIX 1)
(3RP 24)
(3SFSMAN 13)
(3SHAPE 20)
(3VASFMT 3)
(3FILE FAS)
(3DEMON FAS)
(3FASLOA FAS)
(3CLOAD FAS)
(3LENGTH LSP)
(3ZPRINT LSP)
(3EDITOR OIN)
(3OPS S1L)
(3QCP1 LM)
(3HANOID LSP)
(3PACK4 LM)
(3ZMEMQ S1C)
(3GOFAST LSP)
(3RPRIN1 LSP)
(3COMPLR OIN)
(3LAP INI)
(3LENGTH )
(3NTYPES )
(3HANOI LSP)
(3S1FUN )
(3NILMAC LSP)
(3FASL FMT)
(3SYSCON LSP)
(3CLAP INI)
(3PRIMOP )
(3S1FUNS LSP)
(3LAP FAS)
(3ZMEMQ )
(3STRING 1)
(3MAKFAS DOC)
(3NILSIM LSP)
(3LAMBDA )
(3GC DOC)
(3FAS INI)
(3TODO 1)
(3AMBER )
(3OPS FOO)
(3REV 1)
(3GARBAG FAS)
(3INTERP INI)
(3OPS FAS)
(3GARCON LSP)
(3LENGTH S1C)
(3T MET)
(3S1CTST LSP)
(3S1COMP LSP)
(3MACLSP 6)
(3FASCON LSP)
(3DECOMP 7)
(3TESSIM LSP)
(3FACT S1)
(3OPSV4 FOO)
(3NEWFUN 59)
(3SLIDES POX)
(3HASHER )
(3VMACH 42)
(3CCENV 16)
(3ASMMAC 9)
(3COMAUX 6)
(3INTERP 2)
(3BUGS )
(3CLOAD INI)
(3YOW LSP)
(3UNION S1C)
(3DEMO LSP)
(3TYI S1)
(3ZLENGT S2C)
(3ADRHAC )
(3TTYIO LAP)
(3NULLFN LAP)
(3CONSES LSP)
(3ZLENGT S1C)
(3NILINI LAP)
(3ZPRIN1 S1C)
(3S1LAP INI)
(3FUNS )
(3FASLOA 3)
(3LMACRO INI)
(3GOSLOW LSP)
(3CLOAD 6)
(3TAIL 1)
(3REPORT )
(3FUNCAL 1)
(3READ LSP)
(3HACK LSP)
(3CONS LSP)
(3FINAL REP)
(3LAP 12)
(3HANOI2 LSP)
(3SLIDE POX)
(3TITLE )
(3ELISP INI)
(3OPS LSP)
(3NEWFUN 112)
(3ANALYZ FAS)
(3C 1)
(3LOSS 1)
(3C 2)
(3C FAS)
(3PPSAV TMP)
(3CM 1)
(3C 3)
(3C 4)
(3C 5)
(3C 6)
(3C 8)
(3S1COMP FAS)
(3C 7)
(3S1COM2 LSP)
(3OPS DOC)
(3OPEVAL DOC)
(3LAP LSP)
(3ANALYZ LSP)
(3ANALYZ PRE)
(3MAIL TXT)
(3NODE TYP)
(3TAIL DSC)
(3AN LSP)
(3FOO )
(3FOO BAR)
(3CMUC WRK)
(3CODEGE LSP)
(3AN NEW)
(3ANALYZ UNF)
(3CODEGE PRE)
(3CRAWL 1)
(3LOGIN CMD)
(3IMPL PRE)
(3CRAWL FAS)
(3ANAL INI)
(3LISP INI)
(3RPRIN1 FAS)
(3STRING LSP)
(3CODEGE FAS)
(3PROCOM INI)
(3COMP WRK)
(3COMP LSP)
(3PROCOM DMP)
(3PROCOM LSP)
(3FOO INI)
(3CMU REP)
(3S1COMP BUG)
(3S1COMP OUT)
(3COMP LAP)
(3COMP TST)
(3PROCOM FAS)
(3PROG LSP)
(3PROG LAP)
(3PROGN LSP)
(3PROGN LAP)
(3COMLSP )
(3DIR LSP)))
;(setq n (1+ n))
)
 
(progn
(setq s4 '(
(4PRINT FAS)
(4DTYPES S1L)
(4STACKG LM)
(4LAP S1L)
(4LMMAC LM)
(4HEAD )
(4GBS )
(4READER )
(4COMP 2)
(4OPSV4 FAS)
(44V LPT)
(4SLM PRE)
(4CATCH THI)
(4INTERP FAS)
(4CCFORM 23)
(4CHPROP 25)
(4LOC NIL)
(4REV FAS)
(4GARBAG 1)
(4DECOMP FAS)
(4PREFIX 1)
(4RP 24)
(4SFSMAN 13)
(4SHAPE 20)
(4VASFMT 3)
(4FILE FAS)
(4DEMON FAS)
(4FASLOA FAS)
(4CLOAD FAS)
(4LENGTH LSP)
(4ZPRINT LSP)
(4EDITOR OIN)
(4OPS S1L)
(4QCP1 LM)
(4HANOID LSP)
(4PACK4 LM)
(4ZMEMQ S1C)
(4GOFAST LSP)
(4RPRIN1 LSP)
(4COMPLR OIN)
(4LAP INI)
(4LENGTH )
(4NTYPES )
(4HANOI LSP)
(4S1FUN )
(4NILMAC LSP)
(4FASL FMT)
(4SYSCON LSP)
(4CLAP INI)
(4PRIMOP )
(4S1FUNS LSP)
(4LAP FAS)
(4ZMEMQ )
(4STRING 1)
(4MAKFAS DOC)
(4NILSIM LSP)
(4LAMBDA )
(4GC DOC)
(4FAS INI)
(4TODO 1)
(4AMBER )
(4OPS FOO)
(4REV 1)
(4GARBAG FAS)
(4INTERP INI)
(4OPS FAS)
(4GARCON LSP)
(4LENGTH S1C)
(4T MET)
(4S1CTST LSP)
(4S1COMP LSP)
(4MACLSP 6)
(4FASCON LSP)
(4DECOMP 7)
(4TESSIM LSP)
(4FACT S1)
(4OPSV4 FOO)
(4NEWFUN 59)
(4SLIDES POX)
(4HASHER )
(4VMACH 42)
(4CCENV 16)
(4ASMMAC 9)
(4COMAUX 6)
(4INTERP 2)
(4BUGS )
(4CLOAD INI)
(4YOW LSP)
(4UNION S1C)
(4DEMO LSP)
(4TYI S1)
(4ZLENGT S2C)
(4ADRHAC )
(4TTYIO LAP)
(4NULLFN LAP)
(4CONSES LSP)
(4ZLENGT S1C)
(4NILINI LAP)
(4ZPRIN1 S1C)
(4S1LAP INI)
(4FUNS )
(4FASLOA 3)
(4LMACRO INI)
(4GOSLOW LSP)
(4CLOAD 6)
(4TAIL 1)
(4REPORT )
(4FUNCAL 1)
(4READ LSP)
(4HACK LSP)
(4CONS LSP)
(4FINAL REP)
(4LAP 12)
(4HANOI2 LSP)
(4SLIDE POX)
(4TITLE )
(4ELISP INI)
(4OPS LSP)
(4NEWFUN 112)
(4ANALYZ FAS)
(4C 1)
(4LOSS 1)
(4C 2)
(4C FAS)
(4PPSAV TMP)
(4CM 1)
(4C 3)
(4C 4)
(4C 5)
(4C 6)
(4C 8)
(4S1COMP FAS)
(4C 7)
(4S1COM2 LSP)
(4OPS DOC)
(4OPEVAL DOC)
(4LAP LSP)
(4ANALYZ LSP)
(4ANALYZ PRE)
(4MAIL TXT)
(4NODE TYP)
(4TAIL DSC)
(4AN LSP)
(4FOO )
(4FOO BAR)
(4CMUC WRK)
(4CODEGE LSP)
(4AN NEW)
(4ANALYZ UNF)
(4CODEGE PRE)
(4CRAWL 1)
(4LOGIN CMD)
(4IMPL PRE)
(4CRAWL FAS)
(4ANAL INI)
(4LISP INI)
(4RPRIN1 FAS)
(4STRING LSP)
(4CODEGE FAS)
(4PROCOM INI)
(4COMP WRK)
(4COMP LSP))) 
;(setq n (1+ n))
)
'|end of page|
(read)
(foo
bar)
(em:critical-depth)
(em:eval-message-warn)

(do ((i 500. (1- i)))
    ((= i 0) t)(em:readonly-var 'line)) 

2
(length '(
0 1 2 3 4 5 6 7 8 9
10 11 12 13 14 15 16 17 18 19
20 21 22 23 24 25 26 27 28 29
30 31 32 33 34 35 36 37 38 39
40 41 42 43 44 45 46 47 48 49
50 51 52 53 54 55 56 57 58 59
60 61 62 63 64 65 66 67 68 69
70 71 72 73 74 75 76 77 78 79
80 81 82 83 84 85 86 87 88 89
90 91 92 93 94 95 96 97 98 99
100 101 102 103 104 105 106 107 108 109
110 111 112 113 114 115 116 117 118 119
120 121 122 123 124 125 126 127 128 129
130 131 132 133 134 135 136 137 138 139
140 141 142 143 144 145 146 147 148 149
150 151 152 153 154 155 156 157 158 159
160 161 162 163 164 165 166 167 168 169
170 171 172 173 174 175 176 177 178 179
180 181 182 183 184 185 186 187 188 189
190 191 192 193 194 195 196 197 198 199
200 201 202 203 204 205 206 207 208 209
210 211 212 213 214 215 216 217 218 219
220 221 222 223 224 225 226 227 228 229
230 231 232 233 234 235 236 237 238 239
240 241 242 243 244 245 246 247 248 249
250 251 252 253 254 255 256 257 258 259
260 261 262 263 264 265 266 267 268 269
270 271 272 273 274 275 276 277 278 279
280 281 282 283 284 285 286 287 288 289
290 291 292 293 294 295 296 297 298 299
300 301 302 303 304 305 306 307 308 309
310 311 312 313 314 315 316 317 318 319
320 321 322 323 324 325 326 327 328 329
330 331 332 333 334 335 336 337 338 339
340 341 342 343 344 345 346 347 348 349
350 351 352 353 354 355 356 357 358 359
360 361 362 363 364 365 366 367 368 369
370 371 372 373 374 375 376 377 378 379
380 381 382 383 384 385 386 387 388 389
390 391 392 393 394 395 396 397 398 399
400 401 402 403 404 405 406 407 408 409
410 411 412 413 414 415 416 417 418 419
420 421 422 423 424 425 426 427 428 429
430 431 432 433 434 435 436 437 438 439
440 441 442 443 444 445 446 447 448 449
450 451 452 453 454 455 456 457 458 459
460 461 462 463 464 465 466 467 468 469
470 471 472 473 474 475 476 477 478 479
480 481 482 483 484 485 486 487 488 489
490 491 492 493 494 495 496 497 498 499))
∂06-Feb-82  1412	RPG  	bazola   
twerp
exoderm

1	5
2	6
3	7
4	8
twerp
exoderm
ren COMPLR.ofa←complr.fas
ftp COMPLR.fas←{mc}comlap;complr fasl
ren PHAS1.ofa←phas1.fas
ftp PHAS1.fas←{mc}comlap;phas1 fasl
ren COMAUX.ofa←comaux.fas
ftp COMAUX.fas←{mc}comlap;comaux fasl
ren FASLAP.ofa←faslap.fas
ftp FASLAP.fas←{mc}comlap;faslap fasl
ren MAKLAP.ofa←maklap.fas
ftp MAKLAP.fas←{mc}comlap;maklap fasl
ren INITIA.ofa←initia.fas
ftp INITIA.fas←{mc}comlap;initia fasl
ren SRCTRN.ofa←srctrn.fas
ftp SRCTRN.fas←{mc}comlap;srctrn fasl
ren exthuk.ofa←exthuk.fas
ftp exthuk.fas←{mc}lisp;exthuk fasl
'(
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)
(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1)(1))
(foo bar 56 (bar khsdkh prpoww (1212)))
72762
t
(ARG EDITCOMMAND 296 (EM:REAL-TERPRI OUT NEW (695))) 
(+INTERNAL-INTERRUPT-BOUND-VARIABLES FORMAT 607 (%%GC-VERBOSE%% ATOM ESC-ENB (758))) 
(TRACE*G1 |&a-l/|| 725 (EXPT EM:PROCESS-MAIL |Name is not a symbol -- DEFCOMPLRMAC| (816))) 
(APPEND GREATERP 510 (%MAKEDEF MINUS RETURN (625))) 
(UNSEEN-GO-TAG STEP-PD 293 (MEANWHILE ?COND MLMAC (84))) 
(%COMMAND /50 625 (NOFEATURES ELOADACTIONFUN INCLUDEF (973))) 
(REMEDITPROPS |traced but not found, will untrace...| 913 (TRITONYMPHAL OSPEED FXPDL (920))) 
(SORTCAR DEFMAX 764 (PUSH VALUE-CELL-LOCATION MICROBRACHIUS (104))) 
(MAPATOMS ITS 767 (DRONGO PSEUDOCULTURAL BEPROSE (476))) 
(|[AID,RPG]EREAD.6←1| SORT 275 (BASISPHENOID ALTAITE ↑$ (704))) 
(READONLY LIST* 350 (EM:RESET !/, PIGLET (572))) 
(FROM %EVALUATE 315 (|MACROEXPANDED-grindmacro/|| UNDENOMINATIONALIZE EDIT (666))) 
(UNQUOTE GFLATSIZE1 34 (EM:GET-SEND-LINES |LET.direction| WITH-INTERRUPTS (590))) 
(%EDIT1 ?COND 859 (EM:SWALLOW-ALT ROMAN NREVERSE (475))) 
(*DELQ FILE-EXIT-FUNCTIONS-DEFAULT 35 (?%N CHAN ?STEPPERS (363))) 
(OVERREALISM $$$ 96 (|+INTERNAL-macro-loser/|| TRACE-EDSUB PDP10 (216))) 
(NEW MLMAC 678 (YOU EM:REAL-TERPRI IRREPORTABLE (674))) 
(STEP-HARD VALUE-CELL-LOCATION 123 (INSENSE STEP-PD MICROBRACHIUS (275))) 
(ARRAY-/#-DIMS GBLOCK 192 (%NEXT E:LINES |[AID,RPG]UMATCH.123←3| (359))) 
(E:SEND-THIS-LINE &RESTL 386 (ADD1 |EM:READ-UNTIL-EOF MACRO| LET! (341))) 
(UNBLOSSOMED %%NEXT-SYM%% 775 (EDIT-INIT-FILE-LOAD-MESSAGE %EDIT1 UCLOSE (902))) 
(|EM:READ-UNTIL-EOF MACRO| %/#WINDOW-STACK 999 (MACROVAL |,.| +$ (794))) 
(PBI BACKTRACE 643 (SYMBOLP ANY-MEMQ DEFPROP (195))) 
(MAKLAP FSC 763 (%CARN SSTATUS MLMAC (616))) 
(ARG TOPWIDTH 124 (EM:FORCE INCUBOUS EM:TYI-UNTIL-EOF (595))) 
(%EVALUATE GREATERP 65 (SI:/#+OR-READ INTERJACULATE ATOM (240))) 
(*VALS1 *BREAK 708 (ISIN &REST DO-CODE (24))) 
(EM:SEND-SIMPLE-MESSAGE EM:MESSAGEP 546 (|Wrong number args for macro| TIMIT EXAMINE (21))) 
(NUMBER %%GC-CORESIZE%% 781 (LINEL FORMAT EM:TRANSCRIPT-OFF (916))) 
(HUNK128 HANGAR 608 (INSENSE FORCE-OUTPUT |",@" or ",." in illegal context| (971))) 
(|[AID,RPG]UMATCH.123←4| %STRINGSUB 322 (ADVISAL TRANS-REPLACE OPTIONS (878))) 
(%%CODE-PATH%% +INTERNAL-UGT-BREAK 810 (-EM:LQUEUE- %STANDARDREADTABLE FIXP (315))) 
(HETERONOMY POISON 350 (EM:REMOVE-TAIL CLASS-OF TRITONYMPHAL (198))) 
(CERROR (/#-MACRO-*)) 
(%EVAL-ATOM (RECONDENSE)) 
(WITH (READLIST)) 
(/50 (CDAR)) 
(LOGXOR (|[AID,RPG]UMATCH.123←3|)) 
(MINUS (|[AID,RPG]EREAD.6←2|)) 
(VECTORP (DESETQ)) 
(FLONUM (SPECIAL)) 
(EM:REAL-TERPRI (NCONC)) 
(MICROBRACHIUS (FLOAT)) 
(|+INTERNAL-`-grindmacros/|| (FLONUM)) 
(UNBND-VRBL (ATOM)) 
(%%%STEP%%% (EOF)) 
(READ-EVAL-*-PRINT (%LOAD-EDIT-INIT)) 
(|EM:TYI-UNTIL-EOF MACRO| (INCUBOUS)) 
(MACROFETCH (CERROR)) 
(DESETQ (SYS)) 
(TO-VECTOR (RESERVEDNESS)) 
(setq base 8 ibase 8)
(plist 'em:readonly-init)
(setq ↑d t)

(do ()(())(array () () 5))